perm filename NINE[0,BGB] blob
sn#109799 filedate 1974-07-11 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 TITLE NINE
C00003 ENDMK
C⊗;
TITLE NINE
REV1: 0
TRCE 401↔TRCE 401↔TRCE 401
TRCE 202↔TRCE 202↔TRCE 202
TRCE 104↔TRCE 104↔TRCE 104
TRCE 060↔TRCE 060↔TRCE 060
JRST @REV1
REV2: 0
MUL [10004002001]
AND [210210210010]
IDIVI 377
MOVE 1
ANDI 177
JRST @REV2
SA: MOVEI 10,177
MOVE 0,10↔JSR REV1↔MOVEM 0,7
MOVE 0,10↔JSR REV2
CAME 0,7
FUCK: JFCL
SOJGE 10,SA+1
EOL: HALT
END SA